<?	
	/* Se asegura que el archivo es incluido por el index */
	defined( 'LOAD_MODULE_ACTION' ) or die( 'No esta permitido el acceso directo a ' . __FILE__ );  
		$this->oTmpObject = new Exquisito_verso_frm( $this );
	
	class Exquisito_verso_frm extends Frm
	{
	function setValue ( $ncExquisito, $ncOrden )
		{
			$cSql = "SELECT  ncEstadoPublicacion,  ncUsuario,  cVerso,  dPublicacion,  nVerso
				FROM gtExquisitoVerso
				WHERE ncExquisito = '$ncExquisito' AND  ncOrden = '$ncOrden' ";
			$aDatos = $this->oDatabase->getArray($cSql);	
			$this->setFieldsArray ( $aDatos );
		}
	function Exquisito_verso_frm( &$oModule )
		{
			$this->Frm( $oModule );
			//Crea los Objetos de los campos de edicion
			$this->aFields['ncExquisito']					= new InputList( "Exquisito", "ncExquisito" );
			$this->aFields['ncOrden']							= new Input("Codigo","ncOrden", '', false, true);
			$this->aFields['ncEstadoPublicacion']		= new InputList( "ncEstado", "ncEstadoPublicacion" );
			$this->aFields['ncUsuario']						= new InputLookUp( "Usuario", "ncUsuario" );			
			$this->aFields['cVerso']							= new InputText( "Verso", "cVerso" );
			$this->aFields['dPublicacion']					= new InputDate( "Fecha Publicacion", "dPublicacion" );
			$this->aFields['nVerso']							= new InputNumber( "Numero versos", "nVerso" );	
		}	
	function initializeForm()
		{
			// Si viene el Ubicacion hace el retrieve
				if ( $this->isRetrievable() && $this->aFields['ncExquisito']->getValue() && $this->aFields['ncOrden']->getValue() )
				{
					$this->setValue( $this->aFields['ncExquisito']->getValue(), $this->aFields['ncOrden']->getValue() );
				}
			// Configura el Titulo
				$this->setLabel( "Exquisito verso" );	
			return true;
		}
	function initializeField( $cField , &$oField )
		{			
			switch ( $cField )
			{
					case 'ncExquisito':
						$cSql = "SELECT ncExquisito, cdExquisito FROM gtExquisito";
						$oField->setMatrix($this->oDatabase->getMatrix($cSql));
						$oField->setMandatory($this->isMandatory());
					break;
					case 'ncEstadoPublicacion':
						$cSql = "SELECT ncEstadoPublicacion, cdEstadoPublicacion FROM gcEstadoPublicacion";
						$oField->setMatrix($this->oDatabase->getMatrix($cSql));
						$oField->setMandatory($this->isMandatory());
					break;
					case 'ncUsuario':
						initializeUsuarioGit($oField);
						$oField->setForm($this);
					break;
			}
 		}
	}
?>